* lisp/wid-edit.el (widget-complete): Fix typo in 2009-12-02 change.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index fff5f72386f2c11b0ab0684a9e6bb8d1c763da70..80db647fe73c82c7082aeabe5aa9592b8fb88a1e 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2010-06-22  Jürgen Hötzel  <juergen@hoetzel.info>  (tiny change)
+
+       * wid-edit.el (widget-complete): Fix typo in 2009-12-02 change.
+
 2010-06-22  Dan Nicolaescu  <dann@ics.uci.edu>
 
        Fix annotating other revisions for renamed files in vc-annotate.

diff --git a/lisp/wid-edit.el b/lisp/wid-edit.el
index a087f17a900960bdf6c122ab51d76ae3c5286159..fa215031465507fd2eabda47f9faae8ef3a07263 100644 (file)
--- a/lisp/wid-edit.el
+++ b/lisp/wid-edit.el
@@ -1161,9 +1161,9 @@ the field."
 When not inside a field, move to the previous button or field."
   (interactive)
   (let ((field (widget-field-find (point))))
-    (when field
-      (widget-apply field :complete))
-    (error "Not in an editable field")))
+    (if field
+       (widget-apply field :complete)
+      (error "Not in an editable field"))))
 
 ;;; Setting up the buffer.